Add "virtual;" in TBXToolPals on,line 108:

    function  GetCellAt(X, Y: Integer; out Col, Row: Integer): Boolean; virtual;